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| **F 1LE*®*1D**CONVDATA - 
ccccccce 000000 NN NN VV VV DDDDDDDD 
ccccccce 000000 NN NN VV VV DDDDDDDD 
cc 00 00 NN NN VV vv DD DD 
cc 00 00 NN NN VV vv DO DD 
cc 00 00 NNNN NN VV VV DD DD 
cc 00 00 NNNN NN VV vv DD DD 
cc 00 00 NN NN NN VV vv 0D DD 
cc 00 00 NN WN NN VV vv 0D DOD 
cc 00 00 NN NNNN VV vv DD dD 
cc 00 00 NN NNNN V vv DD DD 
- 00 00 NN NN vy vv dD DD 
cc 00 00 NN NN ve VW DD DD 
cccccccc 000000 NN NN vv DDDDDDDD 
cccccccc 000000 NN NN vv DDDDDDDD 
LL 11111] SSSSSSSS 
LL 11111 SSSSSSSS 
LL I] $$ 
LL I] $$ 
LL I] $$ 
LL I] S$ 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] $$ 
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ZTITLE ‘VAK-11 CONVERT’ 
ZSBTTL ‘Dat okie erations: 


MODULE CONVSD 


5 Soeutavoe-eee" 


BEGIN 


. 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE i A ye pee UNDER A LICENSE AND MAY SE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 

COPIES THEREOF - NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
are TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
To yn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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VAK=-11 CONVERT 18-sépe19 4 $340: 08 AX-11 Bliss-32 V4.0-74 
Data Declarations 14-Sep-1984 12:13: CONV. SRC (388 SnvoAYA -832; 
1 '¢¢ 
1! 
§ } Facility: VAX=11 CONVERT 
: } Abstract: CONVERT global data declarations 
§ : } Environment: 
= 2 VAX/VMS Operating System 
i0 ge , ere 
4) 040 1 !-- 
eg 04) 1 
4 eh 1! 
44 045 1 ! Author: Keith B Thompson Creation date: June-1980 
45 044 1! 
065 1! 
4 98 1 ! Modified by: 
48 0047 1! 
49 0048 1! v03-004 JwT0185 Jim Teague 29-Jun-1984 
0049 1! Add 2 Longuords for keeping track of buffer used in 
1 0050 1! FIN ==> STM conversion. 
¢ 33) 1! 
5 26 1! v03-003 RASO250 aefer 23-F eb-1984 
2¢ $4 : } Add CONVSGL _FINDFILES seme Sor use by LIBSFIND_FILE. 
56 0055 1! v03-002 KBT0542 Keith 8. Thompson 99-Jun-1983 
57 Bo28 1! Remove all of the inittiizerion code this should be 
58 0057 1! done at run time 
bh) 0058 1! 
60 0059 1! v03-001 KBT0481 Keith B. Thompson 29-Jan-1983 
1 0060 1! Remove conv$gl_key_desc_vbn 
6 0061 1! 
6 0062 1 !eeee 
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C ATA VAK=11 CONVERT 15-Sep-1984 23:40:2 AX-11 Bliss-32 V4.0-742 Page 3 
Bees Data Declarations 1273 08-1 9b 93:99:28 CONV. SRCICONVDATA.B832;1 ° ( 


; 1 

; 68 1 PCECT 

; 6 1 = _CONVSOWN (PIC), 

>; 68 1 GLOBAL = _CONVSGLOBAL (PIC) 

; «669 1 PLIT = “CONVSPLIT (SHARE,PIC), 

; £9 } CODE = _CONVSCODE (SHARE ,PIC); 

5 7 1 LIBRARY ‘ SYSSLIBRARY :L 18.132"; 

; 7 ; REQUIRE ‘SRCS$:CONVERT'; 

; 75 8S 1 GLOBAL 

; 4 : CONVSAB_FLAGS : BLOCK C 4,BYTE J, ! Flag block 

3 re 19 ; General Global Variables 

; 80 0 1g 1 CONVSGW_OUT_MRS : WORD, ! Output Max. Rec. Size _ 

; a 031 1 CONVSGW_UDF MRS : WORD ! BIO (Undefined) Max Rec Size 
; ¢ 8 14°=#1 CONV$GW_IN_REC_SIZ : SIGNED WORD, ! Input Rec. Size + VFC Offset 
a 315 1 ONV$GW_OUT_REC_SIZ : SIGNED WORD, ! Output Rec. Size 

; B84 b3i8 1 CONVSGW_MAX_REC_SIZ : WORD, ! Maximun record buffer size 

; § 17 1 CONV$GB_CURRENT_FILE BYTE, ' Current file sore processed 
; 86 $18 1 CONVSGL_REC_BUF _PTR LONG, ! Bottom of Record Buffer 

; «87 19 «1 CONVSGL_VFC_BUF _PTR : LONG, ! Bottom of VFC Buffer 

; 0320 1 CONVSGL_EOF : LONG ! End of File VBN 

; wy 321 1 CONVSAR_PROCOGUE : REF BLOCK C ,BYTE J, } Output file prologue (FAST & SORT) 
; we 3 ¢ 1 CONV$GW_PROLOGUE S12 : WORD ! Size in bytes of prologue 

; wi 3 1 CONVSAR_AREA_BLOTK : REF BLOCKVECTOR C -AREASC_BLN,BYTE J, ! Prologue area 
r 4 324 (1 CONVSGW_AREA SIZE : WORD, 

; ¥ 0325 1 CONVSGL_F INDFILE_CTX : LONG, ' Storage handle for LIBSFIND_FILE 
; 9% 0326 1 CONV$GB_PROL_V1 : BYTE, ! Prologue Version 1 Flag 

; 0327 1 CONV$GB_PROL_V : BYTE, ! Prologue Version 2 Flag 

3 38 Bees : CONV$GB_PROL_V : BYTE; ! Prologue Version 3 Flag 

; $359 1 GLOBAL 

; Wy 0331 1 CONVSAL_IN_FILE_NAM : VECTOR C 10,LONG J, 

; 100 the 1 CONVSAR_OUT_FILE_NAM : REF DESC_BLK, 

; 101 0333 1 CONVSAR_FDL_FILE_NAM : REF DESC_BLK, 

; 108 0334 1 

; 0335 1 ! FAB's and RAB‘s 

; 104 Baeo 1 : 

3 +4 83 ! : Input and Output files 

: 107 $339 1 CONVSAB_IN_XABF HC : SXABFHC_DECL, ' Input File Header Char. Xab 
; 108 iret 1 CONVS$AB_IN_XABSUM : SXABSUM_DECL, ' Input File Summary Xab 

: 109 41 1 CONVSAB_IN_NAM : SNAM_DECL, ! Input Name Block 

3 110 O34¢ 1 CONVS$AB_IN~FAB : $FAB-DECL, i Input File FAB 

3.61021 343 1 CONVS$AB_IN_RAB : SRAB_DECL ' Input File RAB 

i We 0344 1 CONV$AB_OUT_XABSUM $XABSUM DECL, i Output File Summary Xab 

s Tf 0345 1 C OUT. NAM_DECL, ! Output Name Block 

3; 61146 Deeg 1 CONVSAB_OUT_F AB : SFAB_DECL, ' Output File FAB 

> 115 0347 1 CONV$AB_OUT—RAB : $RAB"DECL. i Qutput File RAB 

3 He 0348 1 CONVSAB_EXC_RAB : SRAB_DECL; ! Exception File RAB 

Te 0349 1 GLOBAL 

3; «118 Beet 1 ’ 

; eh O32) ' Variables used in FIN --> STM conversion 

3; 121 0388 1 CONVSGL_STM_BUF , ! Beginning of STM buffer 


: 122 
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0354 1 CONVSGL_STM_REC_LEN; 
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! Length 


AX-11 Bliss-32 v4. 
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ata Declarations 14-Sep-1984 12:13:4 CONV. SRC JCONVDATA.B32; 
: Shared messages 
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END ELUDOM 
.TITLE CONVSDATA VAX-11 CONVERT 
SIDENT \V04=000\ 
-PSECT _CONVSGLOBAL,NOEXE, PIC,2 
00000 CONVSAB_FLAGS:: 
00004 CONVSGW_OUT MRS: : 
00006 CONVSGU_UDF ARS: 
00008 CONVSGW_IN-REC_SIZ:: 
0000A CONVSGW_OUT REC_$1Z:: 
0000C CONVS$GW_MAX REC_$12:: 
0000E CONVSGB_CURRENT_FILE:: 
-BLKB 71 


0000F “BLKB 1 
00010 CONVSGL_REC BUF _PTR:: 


00014 CONVSGL_VFE BUF PTR: : 

00018 CONVSGL_EOF VBN:: 

0001C¢ CONVSAR_ PROLOGUE 

00020 CONV$GW_PROLOGUE_SIZ:: 
-BLKB 


00022 “BLKB 
00024 CONVSAR_AREA BLOCK: : 


-BLK 
00028 CONV$GW_AREA_SIZE:: 
-BLKE 


pose 


-BLKB 
Q002C CONVSGL_FINDFILE_CTX:: 
-BLKB 


coeaag™ 
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00030 
00031 
00032 


00084 


0005¢ 
00060 
00064 
00090 
0009C 
OOOFC 
0014¢ 
00190 
0019C 
OO1FC 
0024C 
00290 
00204 
00208 


PSECT SUMMARY 
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emesteag! “1 wins 
CONV$GB_PROL_v2: 


-BL 
CONVS$GB_PROL_v3:: 
-BLKB 1 


AX-11 B 
CONV. sR 


-BLKB 
CONVSAL_IN_FILE_NAM:: 
CONVSAR_OUT FILE_NAM: : 
CONVSAR_FDL_FILE_NAM:: 


CONVSAB_IN XABFHC : 
CONVSAB_IN_XABSUM: : 
CONVSAB_IN NAM: 
CONVSAB_IN FAB: 
CONVSAB_IN RAB : 


CONVSAB out. pe 
CONVS$AB_OUT NAM: : 
-BL 96 
CONVSAB_OUT FAB: : 
-BLKB 80 
CONVSAB_OUT RAB: : 
-BL 68 
CONVSAB_EXC_RAB:: 


-BL 
CONVSGL_STM_BUF :: 


e é 
CONVSGL_STM_REC_LEN:: 
-BLRB 4 


Attributes 
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CONVSDATA VAX=11 CONVERT 14.52 $ep-1984 23:40:2 AX-11 Bliss-32 moot Page 7 
v04-000 Data Declarations 12-Sep-1984 3: 13; § CONV. SRCJCONVDATA.B832 pee . (4) 
~CONVSGLOBAL be NOVEC, WRT, RD ,NOEXE,NOSHR, LCL, REL, CON, PIC,ALIGN(2) 
» MS « NOVEC ,NOWRT, * NORD »NOEXE,NOSHR, LCL, ABS, CON,NOPIC, *ALIGN(O) 
Library Statistics 
~meerteiee = Syabols ooo-o--- Pages Processing 
File Total Loaded Percent Mapped Time 
-$255$DUA28: CSYSLIBILIB.L32;1 18619 28 0 1000 00:01.7 


COMMAND QUALIFIERS 
BLISS/CHECK=(FIELD, INITIAL,OPTIMIZE)/LIS=LIS$:CONVDATA/OBJ=OBJ$:CONVDATA MSRC$:CONVDATA/UPDATE=(ENH$: CONVDATA) 


7 ae 0 code + 732 data bytes 
| Rlaseed’ tees 00:20.7 
; Lines/CPU Min: 3939 
; ema AS Rial 24382 
; pomeey Used: 66 pages 
ation Complete 
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